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Version: *v04-000' 


SHAKATAK EAE AAAAAAAEAARAAAAAA ARERR TAAAERAERAREAREAEEAAERE 


COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
DIGITAL EQUIPMENT CORPORATION, " MAYHARD. MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


+i 

® 

w 

® 

ee 
THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 
VAIN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
COPIES THEREOF MAY NOT GE PROVIDED OR OTHERWISE MADE AVAILABLE TOLANY 
OTHER PERSON. TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
TRANSFERRED. * 
® 
THE INFORMATION IN THIS SOFTWARE 1S SUBJECT TO CHANGE WITHOUT NOTICE 
AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
CORPORATION. : 
® 

& 

® 

* 

® 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


#@eeeeee eee eee eee ee nenn 


SHACK KAKA AAA AAAAAAEAAARAAAAAARAAAAAAARAARAAAAAAEAAAATEEAAEREEAEAA EEE 


+ 


+ 
Revision history: 
v03-002 niogsre Michael I. Rosenblum 20-Mar-1984 
Define a read state word (rTy$w RB URDSTATE) and the 
Wrap state bit. 


Create TTYDEF.SDL from TTYDEF.MAR. Move macro definitions 
to TTYMACS.MAR. 


See TTYMACS.MAR for additional history. 


AAA AAAAAAAAAA AAAAAN 
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module STTYVECDEF; 


end CLASS_DEF; 
aggre ate PORT_DEF structure PREFIX PORT; 


3; Vv 
/t : 
/t pee 
/ 3* 
/* :* 
3* 
aggregate CLASS_DEF structure PREFIX "CLASS"; - 
GETNXT Longword unsigned tag ‘"’; :* 
PUTNX Longword unsigned tag ‘"'; /* 7* 
SETUP_ UCB longword unsigned tag '"'; /* :* 
DS TRAN Longword unsigned tag ‘"'; /* :* 
DOT Longword unsigned tag '"'; /* :* 
READERROR longword unsigned tag '"'; /* :* 
DISCONNECT longword unsigned tag ‘"'; /* :* 
FORK Longword unsigned tag ‘"'; /* :* 
POWERFAIL longword unsigned tag ‘"'; /* :* 
ongword unsigned tag ‘"’; /* - 
$e 
& bs 
STARTIO longword unsigned tag ‘"'; /* :* 
DISCONNECT longword unsigned tag ‘"'; /* :* 
SET_LINE lLongword unsigned tag '"'; /* be 
DS _SET Longword unsigned tag ‘"'; /* :** 
x Longword unsigned tag '"'; /* 
XOF F Longword unsigned tag '"'; /* +? 
STOP longword unsigned tag ‘"'; /* 
STOP2 Longword unsigned tag ‘"'; /* R 
ABORT Longword unsigned tag ‘"'; /* 
RESUME longword unsigned tag ‘"'; /t 
SET MODEM longword unsigned tag ‘"'; /* 
ma longword unsigned tag ‘"'; /* 
MAINT longword unsigned tag ‘“'; /* 
FORKRET longword unsigned tag ‘"'; /* 


constant "‘LENGTH’’ equals . tag ‘"’; /* must be at end. 
end PORT_DEF; 
end_module STTYVECDEF; 
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module STTYSYMDEF; 
{ree 


/* 
‘ Miscellaneous symbols used by the terminal driver. 


/e=- 


/t 
MM FORK DISPATCHER BIT DEFINITIONS 


aggregate FORK structure oref is TTY$; $ 
FD_UNSOL bitfield mask; /* SEND UNSOLISITED INPUT MESSAGE : 
FD_GETAHD bitfield mask; /* CREATE A TYPEAHEAD BUFFER : 
FD_DISCONNECT bitfield mask; /* DISCONNECT AND DELIVER HANGUPAST ; 
FD_PORTFORK bitfield mask; /* FORK DISPATCH FOR THE PORT DRIVER : 
FD_UNLINK bitfield mask; /* UNLINK PUCB & Luce (DETACH) . 

FO_LINK bitfield mask; /* LINK PUCB & LUCB (CONNECT : 

FO_BUSY bitfield mask; /**** MUST REMAIN AT THE END teeneeee 3 

end FORK; : 
constant ( ; 
CTRLA, /* 1 : 

CTRLB, /* § : 

CTRLC, /* : 

CTRLD, /t & : 

CTRLE, /* 5 : 

CTRLF, /* § : 

Bell. . 5 : 

* : 

TAB, /* 9 : 

LF, /* 10 : 

VT, /* 11 : 

FF, /* \¢ 3 

CR /* 1 : 

CTRLN, /* 14 ; 

CTRLO, /* 15 3 

CTRLP, /* 16 3 

CTRLQ, /* 17 (XON) : 

CTRLR, /* H : 

CTRLS, /* 19 (XOFF) : 

CTRLT, /* 20 : 

CTRLU, /* 21 : 

CTRLV, a ; 3 

CTRLW, /t : 

CTRLX, / 24 3 

CTRLY, /* 25 : 

CTRLZ /* § : 

ESCAPE fe 3 

) equals 1 increment 1 prefix TTY$ tag C; : 
constant XON equals 17 prefix ris tag C; 3 
constant XOFF equals prefix TTY$ tag C; : 
constant BLANK equals prefix TTY$ tag C; : 
constant DOLLAR equals prefix TTY$ tag C; 3 
constant PLUS equals 45 prefix TTY$ tag C; : 
constant ZERO equals 48 prefix TTY$ tag C; : 
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constant ONE equals 49 prefix TTY$ tag C; 
constant SCRIPT equals prefix TTY$ tag C; 
constant LOWA equals prefix TTY$ tag C; 
constant LOWZ equals prefix TTY$ tag ¢; 
constant Lowe se) equals 125 prefix TTY$ tag t; 
constant LOWESC ay 6 vai TTY$ tag C; 
constant DELETE equals 12/7 prefix BAL tag C; 
constant NL equals 1 § prefix TTYS$ tag C; 
constant CSI equals 155 prefix TTY$ tag C; 


® 
: Miscellaneous values 


constant MAXPAGWID equais 511 prefix TTY$ tag C; 


constant MAXPAGLEN equals ei prefix TTY$ tag C; 
constant HIGHIPL equals 22 prefix TTY$ tag C; 


® 
: EDIT READ STATES (STORED IN THE MODE FIELD OF THE READ BUFFER) 


constant ( 
MAL /* NORMAL CONTROL@R OR CONTROL-U 
CLRECHO, /* ECHO yf Be TABS eitew TO SPACES 


ECHLINE /* ECHO FROM GIVEN STR 

UPDCURSOR, pn Se THE CURSOR POSITION THEN EXIT 
MOVE CURSOR, /* MOVE THE CURSOR ye, ITS FINAL PLACE 
CLRREST, /* CLEAR THE REST OF THE LINE 

PRMECHO /* ECHO A 

PRMECHOT , /* RETURN STATE FOR PROMPT ECHOING 
AESECHO, /* ECHO AES STRIN E 

RVECHO, /* ECHO READ VERIFY STRING 

SIMCEOL /* SIMULATE CLEAR TO END OF LINE 


) equals 0 increment 1 prefix TTY$ tag K_ER; 


/t 
im EDITING TOKENS 


/e 


constant ( 
CTRLU, /* CONTROL =U 
CTRLR /* CONTROL-R 
DELEFT, /* DELETE CHARACTER LEFT 
ESCAPE, /* ESCAPE PREFIX CHARACTER 
/eeeeee END OF THE NORMAL EDITING CHARACTERRSn 
BACK /* BACKUP 1 CHARAETE 
PORUARD. CHAR, /* MOVE FORWARD 1 CHARCTER 
MOV E EOL. /* MOVE TO THE END OF LINE 
MOVE ~BOL /* MOVE TO THE BEGINNING OF THE LINE 
DELETE WORD, /* DELETE WORD TO THE LeET 
QUOTING, /* AND THE QUOTE CHARACTER 
RECALL, / RECALL THE LAST Command 
TOGGEL, /* T0GG GEL BETWEEN INSERT AND OVERSTRIKE MODES 
UNU /* =. REMAIN AT 
TERMINATE /* CATES CHARACTERS WhOT ALLOWED IN EDITING INPUT LINE 
) equals 1 irene : ee x TTY$ tag K_ET; 


constant EDITNORMAL equals TTYSK_ET_ESCAPE prefix TTY$ tag K; 
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je INTERNAL FUNCTION CODES 
constant ( 


AD /* READ FUNCTION 
WRITE, /* WRITE FUNCTION 
ETM, /* SET MODE 
SETC, /* SET CHAR 
HANGUP, /* HANGUP 
MAINT, /* MAINTENCE FUNCTION 
CTRL /* CONTROL SNABLE 
CONNECT, /* CONNECT TO DETACHED TERMINAL 
4 gn /* DISCONNECT FROM ATTACHED TERMINAL 
; ) equals 0 increment 1 prefix TTY$ tag C_FC; 
= CHARACTER CHARACTERISTICS 
© 
aggregate CHAR_CHAR structure prefix TTY$; 
CH_FILC bitfield length 3; 
CH_LOWER bitfield mask; 
CH_SPEC bitfield mask; 
CH_CTRL bitfield mask; 
CH_CTRL bitfield mask; 
CH_CTRL bitfield mask; 


end CHAR_CRAR; 
end_module STTYSYMDEF ; 


= 
-_ 
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module STTYRBDEF; 
{ree 


/* R 
/t 


/ 
. buffer contains all the 


[too 


ead buffer definitions 


) 
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This buffer is oh located everytime a read is issued. The 


aggregate TTYRBDEF structure prefix TTY$; 


RB_TXT longword unsigned; 


RB_UVA songeere unsigned; 
RB_SIZE word unsigned; 
RB_SPARE1 byte unsigned; 
RB_ECHLEN byte unsigned; 
RB_ECHOAREA quadword unsigned; 
RB_ECHSTR longword unsigned; 
RB_PIC lLongword unsigned; 
RB_TERM Longword unsigned; 
RB_MOD lLongword unsigned; 
RB_AES aerS unsigned; 
RB_AESLEN word unsigned; 


RB_RDSTATE_OVERLAY union fill; 
TE word unsigned; 


RDSTA / 
RB_RDOSTATE BITS structure fill prefix TTY$; 
bitfield 


_W mask; 
end RB_RDSTATE BITS; 
end RB_RDSTATE_OVERLAY; 


RB_LIN lLongword unsigned; 
RB_LINOFF word unsigned; 
RB_LINREST word unsigned; 
RB_PRMLEN word unsigned; 
RB_TIMOS word unsigned; 
RB_CPZCUR word unsigned; 
_CPZORG word unsigned; 
TXTOFF word unsigned; 


word unsigned; 


B_TXTS12Z word unsigned; 
RB_TXTECH word unsigned; 
RB_MODE word unsigned; 
RB_RVFCLR byte unsigned; 
RB_RVFFIL byte unsigned; 
RB_ESC d unsigned; 


“ESCTKN wor 
RB_PRM_OVERLAY union fill; 


nformation necessary to perform this read. 


Address of the first character of 
the read data. 

READ BUFFER = USER VIRTUAL ADDR 
READ BUFFER = BLOCK SIZE 


NUMBER OF CHARACTERS TO ECHO 
WHEN OUTPUTTING FROM ECHSTR 
TO ECHO CHARACTERS FROM 
ADDRESS OF THE FIRST CHARACTER 
UT DURING EDITECHOING 


FOR READ VERIFY 

THE ADDRESS OF THE TERMINATOR BITMASK 
MODIFIER LONGWORD 

ADDRESS OF THE AES STRING 

THE LENGTH OF THE AESSTRING 


Read state information word 


/* THE READ HAS WRAPPED EITHER IN THE PROMPT OR INITIAL STRING 


ADDRESS OF THE FIRST CHARACTER ON 
THIS LINE. 

OFFSET FROM THE BEGINNING OF THE 
LINE TO THE CURSOR POSIT 

NUMBER OF CHARACTERS TO THE RIGHT 

OF THE CURSOR POSITION, USED BY 
INPUT EDITING 

LENGTH IN BYTES OF THE PROMPT STRING 
READ purreR - TAnGouT SECONDS 

CURRENT CURSOR POSITION 

READ BUFFER = ORIGONAL HORIZON 
OFFSET FROM THE BEGINNING OF THE 
DATA TO THE Lora ice OF THE NEXT CHARACTER 
the lonate of the picture string 

THE LENGTH OF THE READ. 

NT OF INITIAL STRING TO ECHO 
VALUE INDICATING READ EDIT MODE 
CLEAR CHARACTER FOR READ VERIFY 
READ VERIFY FILL CHARACTER 
ESCAPE TOKEN CHARACTER 


oe ey 
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RB_DATA 
end RB_PRM_OVERLAY; 
end TTYRBDEF; 
end_module STTYRBDEF ; 


address; 
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/* ADDRESS OF BEGINNING OF THE PROMPT 


Longword unsigned; /* READ BUFFER = DATA 
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ooeyve STTYISDEF ; 
- ITEM LIST STACK STRUCTURE 
: DESCRIPTION: 


4.12 
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THIS STRUCTURE IS ALLOCATED OFF THE STACK WHEN AN ITEM LIST QI0 IS 


/ 

/ 

/* DETECTED. 
[t-- 


aggregate TTYISDEF structure 


prefix TTY$; 


I1S_ACMODE Longword unsigned; /* ACCESS MODE MAXIMIZED WITH THE MODE OF THE CALLER 
IS_EDITMODE lLongword unsigned; /* PLACE TO KEEP THE MODE 
1S_BUF Longword unsigned; /* THE USERS ADDRESS OF HIS BUFFER 
1S_BUFLEN Longword unsigned; /* THE LENGTH OF THE USERS BUFFER 
IS_INI Longword unsigned; /* USERS INITIAL STRING ADDRESS 
IS_INILEN Longword unsigned; /* LENGTH OF ha justi, STRING 
IS_INIBUF longword unsigned; /* length of initial buffer for fallback use 
IS_ITMLST longword unsigned; /* THE USERS ADDRESS OF THE ITEM LIST 

/* USED AS A POINTER TO THE NEXT ENTRY 
IS_LASTITM lLongword unsigned; /* USERS ADDRESS OF THE LAST ITEM 

/* CALCULATED FROM BEGINNING ADDRESS AND LENGTH 
IS_MODIFY Longword unsigned; /* THE USERS MODIFIER BITS 
IS_PIC Longword unsigned; /* USERS ADDRESS OF THE PICTURE STRING 
IS_PICLEN lLongword unsigned; /* THE LENGTH OF THE PICTURE STRING 
IS_PRM lLongword unsigned; /* USERS ADDRESS OF THE PROMPT STRING 
I1S_PRMLEN lLongword unsigned; /* THE LENGTH OF THE PROMPT STRING 
IS_PRMBUF lLongword unsigned; /* Length of prompt for fallback use 
IS_SPECIFYED Longword unsigned; /* BITAMASK OF SPECIFYED ITEM LIST ENTRIES 
IS_TERM longword unsigned; /* THE ADDRESS OF THE USERS TERMINATOR MASK 
IS_TERMLEN longword unsigned; /* THE LENGTH OF THE USERS TERMINATOR 
IS_AES Longword unsigned; /* THE ADDRESS OF THE ALTERNATE ECHO STRING 
IS_AESLEN Longword unsigned; /* THE LENGTH OF THE ALTERNATE ECHO STRI 
IS_TIMEOUT Longword unsigned; /* TIMEOUT VALUE 
IS_FILLCHR word unsigned; /* TWO BYTES SPECIFYING FILL AND CLEAR CHARACTER 
IS_INIOFF word unsigned; /* OFFSET INTO INITIAL STRING FOR ECHOING 
constant IS_LENGTH equals . tag K; /* LENGTH 


end TTYISDEF; 
end_module STTYISDEF; 


TT 


1 


1 


1 
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os 
— 


module STTYILDEF; 
{eee 
~ Itemlist Descriptor 


+ 


/* Description: 
/* This set of definitions defines the locations of all the fields 


s in the toratael Q10 item List. 


aggregate TTYILDEF structure prefix TTY$; 


IL_LEN word unsigned; /* T THE ENGTH OF THE BUFFER POINTED TO BY ADR 
it TYPE word unsigned; /* T lite Coes OF THIS ITEM 

L-ADR Longword unsigned; /* T SPECIFYED ADDRESS 

IL[RETADR longword unsigned; /* VALUE SRE TURNED ADDRESS 

constant IL_LENGTH equals . tag K; /* LENGTH 
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end TTYILDEF; 
end_module STTYILDEF; 
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at 
_" 


goeule STTYTADEF; 
TYPEAHEAD BUFFER 


a 


TA_ SPARE word unsigned; 
character Length #rcllen As | **A’'; /* TYPEAHEAD BUFFER = RECALL BUFFER 
TA_DATA longword unsigned; YPEAHEAD BUFFER = DATA START 
constant TA_RCLLEN equals @rcllen tag K; /* LENGTH OF RECALL 
end TTYTADEF; 


end_module STTYTADEF ; 


js DESCRIPTION: | 
/* purr gr IS USED TO STORE CHARACTERS BEFORE PROCESSING AND : 
/* ROVING a. INTO THE USERS READ BUFFER. : 
LU a LOCATED ON UNSOLICITED DATA OR THE FIRST READ POSTED ON A TERMINAL : | 
yh . : | 
aggregate TTYTADEF structure prefix TTY$; ; 
arcllen = 256; /* THE LENGTH OF THE RECALL BUFFER : 
TA_PUT Longword unsigned; /* PUT POINTER ; 
TA_GET conquer’ uns igned; /* GET POINTER : 
TA_SIZE word unsi loned 3 /* BLOCK SIZE $ 
byte unsigned; /* : 
1A “SPARE1 byte unsigned; ; 
A_INAHD word unsigned; /* COUNT OF CHARS IN BUFFER 3 
TA_RCLOFF word unsigned; /* NUMBER OF CHARACTERS IN THE RECALL 3 
/* BUFFER USED. 3 | 
TA_END enquere, una Sqn /* END ADDRESS F 
TA_RCLSI = unsigned; /* THE SIZE OF THE RECALL STRING : 
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goes STTYMDMDEF ; /* aka STTYMODEM via hack in TTYMACS.MAR . 
~ Modem control state table definitions 
| 
/* 
. state entry definitions 
aggregate MODEM_STATE structure prefix MODEMS; | 
ST_ONMASK byte unsigned; /toutput signals to activate 
ST_OFFMASK byte unsigned; peoytput signals t9 qiseste 
“ R word unsigned; /*timer ee to init 
ST_ROUTINE word unsigned; /taction routine 


constant ST_LENGTH equals . tag C; /* LENGTH 
end MODEM_STATE; 


/t 
i transition definitions 
® 
aggregate MODEM_TRANS structure prefix MODEMS; 
TRAN_TYPE byte unsigned; /* element type 
TRAN_TYPE2 byte unsigned; /* unused element type 
TRAN_NSTATE word unsigned; /* next state offset from root 
TRAN_OF FMASK byte unsigned; /* input signals test on 
TRAN_ONMASK byte unsigned; /* input signals test off 
constant TRAN_LENGTH equals . tag C; /* LENGTH 
Pa end MODEM_TRANS; 
es transition type codes 
constant ( 
TRAN_DATASET, /* dataset 
TRAN_TIME, /* timer 
TRAN_END, /* end of transition List 
TRAN DIAL TYPE. /* test for sysgen gorencter 
TRAN_D21 /* controller = 021 
TRAN”NOMODER /* Line not enabled for modem 
te ) equals 0 increment 1 prefix MODEM tag $C; 
a argument type codes 
constant ( 
INIT /* init Line 
SHUTOWN, /* hangup command 
NULL /* null, for detecting preset conditions 
DATASET, /* dataset interrupt 
TIMER mer expiration 


/*t 
) equals 0 increment 1 prefix MODEM tag $C; 


aggregate RODER_BITS structure prefix TIMCTRL$; 
CANCEL bitfield mask; / 


*CANCEL TIMER REQUEST 
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ACTIVE bitfield mask; /*TIMER CURRENTLY ACTIVE 
end MODEM_BITS; 
constant ENABLE equals %xX8000 prefix MODEMS tag ‘'M''; /*mask enable 
end_module STTYMDMDEF ; 


a 
= 


? 


.2! 
1) 
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module STTYDEF; 
[ree 


/* 
. Terminal driver write packet (TWP) 


/e-- 


aggregate TTYWBDEF structure prefix TTY$; 


on 
Cc 

— 
rmmnsese 
RR 


= 


‘oe 
VOX VEWO 0 UN 


Longword unsigned; 
ranger’ unsigned; 
word unsigned; 
byte unsigned; 
byte unsigned; 
lLongword uns H 
lLongword unsigned; 
Longword unsigned; 
Longword unsigned; 
Longword unsigned; 
longword unsigned; 
vonguere unsigned; 
word unsigned; 
word unsigned; 
lLongword unsigned; 


constant WB_LENGTH equals . tag K; 
constant WB_LENGTH equals . tag C; 


WB_DATA 
end TTYWBDEF; 


end_module S$STTYDEF; 


longword unsigned; 


tH 
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/* LENGTH 
/* LENGTH 


/* 
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